home *** CD-ROM | disk | FTP | other *** search
/ Winzipper / Winzipper_ISO.iso / programming / oracle7 7.2 / DB / UTIL72 / DBMSSTDX.SQL < prev    next >
Encoding:
Text File  |  1995-05-09  |  4.6 KB  |  109 lines
  1. rem 
  2. rem $Header: dbmsstdx.sql 7020100.1 94/09/23 22:14:24 cli Generic<base> $ 
  3. rem 
  4. Rem  Copyright (c) 1991 by Oracle Corporation 
  5. Rem    NAME
  6. Rem      stdext.sql - Kernel extensions to package standard
  7. Rem    DESCRIPTION
  8. Rem      Routines in this package do not need to be qualified by the
  9. Rem      owner or package name, similar to the behaviour of package
  10. Rem      'standard'.  This package mostly contains utility routines for
  11. Rem      triggers.
  12. Rem    RETURNS
  13. Rem 
  14. Rem    NOTES
  15. Rem      
  16. Rem    MODIFIED   (MM/DD/YY)
  17. Rem     jwijaya    04/05/93 -  merge changes from branch 1.3.312.1 
  18. Rem     jwijaya    03/26/93 -  bug 157348 
  19. Rem     rkooi      11/28/92 -  add 'keep' option to raise_application_error 
  20. Rem     rkooi      10/25/92 -  deal with null arg to rae 
  21. Rem     glumpkin   10/21/92 -  Renamed from STDEXT.SQL 
  22. Rem     mmoore     09/24/92 - #(130568) add callback for commit comment 
  23. Rem     rkooi      09/02/92 -  change pls_integer to binary_integer 
  24. Rem     mmoore     08/12/92 -  override the savepoint command in standard
  25. Rem     rkooi      06/10/92 -  add 'do not change' comment 
  26. Rem     mmoore     04/14/92 -  move begin_oltp to package transaction 
  27. Rem     rkooi      04/06/92 -  merge changes from branch 1.7.300.1 
  28. Rem     rkooi      04/02/92 -  split dbms_standard into separate pkgs 
  29. Rem     maporter   03/25/92 -  renumber 8200 to 8175
  30. Rem     rbamford   03/07/92 -  add BEGIN_OLTP_TRANSACTION 
  31. Rem     mroberts   02/21/92 -  delete extra rollback_sv procedure 
  32. Rem     rkooi      02/17/92 -  add set_role and related procedures 
  33. Rem     mroberts   02/14/92 -  add execute_ddl internal 
  34. Rem     mmoore     02/06/92 -  change name of package 
  35. Rem     mmoore     01/14/92 -  add rollback_nr 
  36. Rem     mmoore     01/09/92 -  speed up 
  37. Rem      rkooi      11/24/91 -  rename to stdext.sql from stdext.pls
  38. Rem      rkooi      08/26/91 -  get rid of stack_application_error 
  39. Rem      rkooi      05/08/91 -  change name to standard_extension 
  40. Rem      rkooi      05/02/91 -  forgot skip_row procedure 
  41. Rem      mmoore     05/02/91 -  move trigger icds to psd, use varchar2 in
  42. Rem                             rae/sae
  43. Rem      rkooi      04/23/91 -  add 'skip_row' procedure, commit etc.
  44. Rem                             procedures. 
  45. Rem      Moore      04/02/91 -  fix typo
  46. Rem      Moore      03/28/91 -  add boolean trigger functions 
  47. Rem      Kooi       03/17/91 -  Creation
  48. Rem      Kooi       03/12/91 -  change name to standard_utilities
  49. Rem      Kooi       02/26/91 -  get rid of raise now that psdkse does it
  50. Rem      Kooi       02/26/91 -  Creation
  51. ------------------------------------------------------------------------------
  52.  
  53. REM *****************************************************************
  54. REM THIS PACKAGE MUST NOT BE MODIFIED BY THE CUSTOMER.  DOING SO
  55. REM COULD CAUSE INTERNAL ERRORS AND SECURITY VIOLATIONS IN THE RDBMS.
  56. REM *****************************************************************
  57.  
  58. drop package dbms_standard
  59. /
  60. create package dbms_standard is
  61.  
  62.   -- Trigger Operations
  63.   procedure raise_application_error(num binary_integer, msg varchar2,
  64.       keeperrorstack boolean default FALSE);
  65.     pragma interface (C, raise_application_error);         -- 1 (see psdicd.c)
  66.   function inserting return boolean;
  67.     pragma interface (C, inserting);                       -- 2 
  68.   function deleting  return boolean;
  69.     pragma interface (C, deleting);                        -- 3 
  70.   function updating  return boolean;
  71.     pragma interface (C, updating);                        -- 4 
  72.   function updating (colnam varchar2) return boolean;
  73.     pragma interface (C, updating);                        -- 5 
  74.  
  75.   -- Transaction Commands
  76.   procedure commit;
  77.     pragma interface (C, commit);                          -- 6 
  78.   procedure commit_cm(vc varchar2);
  79.     pragma interface (C, commit_cm);                       -- 7
  80.   procedure rollback_nr;
  81.     pragma interface (C, rollback_nr);                     -- 8 
  82.   procedure rollback_sv(save_point varchar2);
  83.     pragma interface (C, rollback_sv);                     -- 9 
  84.   procedure savepoint(save_point varchar2);
  85.     pragma interface (C, savepoint);                       -- 10
  86.   procedure set_transaction_use(vc varchar2);   
  87.     pragma interface (C, set_transaction_use);             -- 11
  88.  
  89.   -- Override call in standard
  90.   procedure sql_ddl(stmt varchar2);
  91. end;
  92. /
  93.  
  94. create package body dbms_standard is
  95.  
  96.   -- Override call in standard
  97.   procedure sql_ddl(stmt varchar2) is
  98.   begin
  99.     null;
  100.   end;
  101. end;
  102. /
  103. drop public synonym dbms_standard
  104. /
  105. create public synonym dbms_standard for sys.dbms_standard
  106. /
  107. grant execute on dbms_standard to public
  108. /
  109.